*----------------------------------------------------------------------*
***INCLUDE LZBSPEDITORI01.
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0101  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE user_command_0101 INPUT.

  IF sy-ucomm CS 'E'.
     leave to screen 0.
  ENDIF.

ENDMODULE.